} bind def {turkeypat} image /FI { } bind def {turkeypat} false 3 colorimage /FCI { } bind def grayBuf turkeypat copy pop /turkeypat grayBuf length string def } repeat grayBuf j 3 -1 roll put /j j 1 add def /i i 1 add def rgbArray i get 0.12 mul add cvi /i i 1 add def rgbArray i get 0.55 mul add /i i 1 add def rgbArray i get 0.33 mul grayBuf length{ /j 0 def /i 0 def turkeypat {rgbArray j 3 -1 roll put /j j 1 add def} forall /j 0 def /i 0 def /grayBuf turkeypat length 3 idiv string def /rgbArray turkeypat length array def /CI2I {